home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 June / EnigmA AMIGA RUN 08 (1996)(G.R. Edizioni)(IT)[!][issue 1996-06][EARSAN CD VII].iso / earcd / utilwb / astart08.lha / A-Start / A-StartInstall < prev    next >
Text File  |  1996-04-08  |  3KB  |  122 lines
  1. ;******************** A-Start v0.5B install-script *******************
  2.  (set MSG_SPACE "\n\n\nWelcome to A-Start v0.87 (c) Tuomas Artman/vPS.\n\nEnjoy this voidParrot Software product.\nPlease remember that this is only a preview version\nand has therefore only a limited number of functions.\nFull A-Start 1.0 version will be released as soon as possible!\n")
  3.  (set MSG_DESTINATION "Where would you like A-Start to be installed?\n(The installer will create a directory called\nA-Start in the chosen path.)")
  4.  (set MSG_COPYING "Copying A-Start-files to %s.")
  5.  (set @abort-button "Abort installation.")
  6.  (set MSG_THANKS "\n\n\n\nThank you for using a vPS-product!\nPlease support the author!")
  7.  (set MSG_WBS "\n\n\n\nDo you want A-Start to be started\non every boot-up?\n")
  8.  (set FSource)
  9.  (set Msg_run "\n\n\n\n\nDo you now want to configure A-Start?\nBe adviced that A-StartPrefs needs MUI!\n")
  10. (set osversion  (/ (getversion) 65536))
  11. (if (>= osversion 39)
  12.    (set guide_reader "MultiView")
  13.    (set guide_reader "AmigaGuide")
  14. )
  15.  
  16. (set installed "")
  17.  
  18. (complete 0)
  19. (message (MSG_SPACE ))
  20.  
  21. (set dest_dir
  22.    (askdir (prompt (MSG_DESTINATION))
  23.          (help @askdir-help)
  24.          (default @default-dest)
  25.          (newpath))
  26. )
  27.  
  28. (set dest_dir (tackon dest_dir "A-Start"))
  29. (set @default-dest dest_dir)
  30. (complete 20)
  31.  
  32. (copyfiles  (help @copyfiles-help)
  33.           (source "A-StartPrefs")
  34.           (dest "Sys:Prefs")
  35.           (infos)
  36. )
  37. (complete 40)
  38. (copyfiles  (help @copyfiles-help)
  39.           (source "A-Start")
  40.           (dest @default-dest)
  41.           (infos)
  42. )
  43.  
  44. (complete 60)
  45. (copyfiles  (help @copyfiles-help)
  46.           (source "Docs")
  47.           (dest (tackon @default-dest "Documentation"))
  48.           (all)
  49.           (infos)
  50. )
  51.  
  52.  
  53. (complete 70)
  54.  
  55. (tooltype (dest "A-StartWBS")
  56.         (settooltype "ASPATH" @default-dest)
  57. )
  58.  
  59.  
  60.  
  61. (if
  62. (askbool  (prompt MSG_WBS)
  63.         (default 1)
  64.         (help "If you choose 'YES', the installer will copy A-StartWBS to the 'Sys:WBStartup'-dir. A-StartWBS is a very small program, which launches the A-Start-main-program via the specification of A-Start's path in the ToolTypes of the icon of A-StartWBS.\nConfused? Just press 'Yes'!")
  65. )
  66.   (copyfiles  (help @copyfiles-help)
  67.           (source "A-StartWBS")
  68.           (dest "Sys:WBStartup")
  69.           (infos)
  70.   )
  71.  
  72.   (copyfiles  (help @copyfiles-help)
  73.           (source "A-StartWBS")
  74.           (dest @default-dest)
  75.           (infos)
  76.   )
  77.  
  78. )
  79.  
  80.  
  81.  
  82. (complete 80)
  83. (copyfiles  (help @copyfiles-help)
  84.           (source "Docs.info")
  85.           (newname "Documentation.info")
  86.           (dest @default-dest)
  87. )
  88.  
  89.  
  90.  
  91. (if (exists "/A-Start.info")
  92.   (copyfiles  (help @copyfiles-help)
  93.           (source "/A-Start.info")
  94.           (dest (pathonly @default-dest))
  95.   )
  96.  
  97. )
  98.  
  99. (complete 90)
  100.  
  101. (makedir (tackon @default-dest "Caches"))
  102. (makedir (tackon @default-dest "Utils"))
  103.  
  104.  
  105. (complete 100)
  106.  
  107. (if (exists (tackon @default-dest "A-Start.guide.info") (noreq))
  108.    (
  109.      (tooltype   (dest (tackon @default-dest "Documentation/A-Start.guide"))
  110.                (noposition) (setdefaulttool guide_reader))
  111.    )
  112. )
  113.  
  114. (run "run Sys:Prefs/A-StartPrefs"
  115. (confirm)
  116. (prompt Msg_run)
  117. (help "You may now start A-StartPrefs to configure your version of the main program. A-StartPrefs will not work, if you do not have MUI 2.2+ installed.")
  118. )
  119.  
  120.    (exit (MSG_THANKS))
  121.  
  122.